home *** CD-ROM | disk | FTP | other *** search
- /*********************************************************************
- * GEMTERM V1.2
- * 1992 by Martin F. Gergeleit
- * placed in the public domain
- *
- * GEMTERM COMES WITH ABSOLUTELY NO WARRANTY, NOR WILL I BE LIABLE FOR ANY
- * DAMAGES INCURRED FROM THE USE OF IT. USE ENTIRELY AT YOUR OWN RISK!!!
- *********************************************************************/
-
- #include <osbind.h>
- #include <mintbind.h>
- #include <stdio.h>
- #include <string.h>
-
- main(ac,av)
- int ac;
- char **av;
-
- {
- int i;
- int tosrun;
-
- if (ac < 3) {
- fprintf(stderr, "usage: gxterm {-c|k|n} directory progam {arguments}\n");
- exit (0);
- }
-
- tosrun = Fopen("U:\\PIPE\\TOSRUN", 2);
- if (tosrun < 0) {
- fprintf(stderr, "gxterm: can't open U:\\PIPE\\TOSRUN\n");
- exit (-1);
- }
-
- i = 1;
- if (av[i][0] == '-') {
- char flags = 0x80;
-
- while (av[i][0] == '-') {
- if (av[i][1] == 'c')
- flags |= 0x01;
- if (av[i][1] == 'k')
- flags |= 0x02;
- if (av[i][1] == 'n')
- flags |= 0x04;
- i++;
- }
- Fwrite(tosrun, 1, "\001");
- Fwrite(tosrun, 1, &flags);
- }
-
- for (; i < ac; i++) {
- Fwrite(tosrun, strlen(av[i]), av[i]);
- if (i != (ac-1))
- Fwrite(tosrun, 1, " ");
- }
-
- Fwrite(tosrun, 1, "\0");
-
- Fclose(tosrun);
- }
-